home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / comm / tskerm25.zip / ZSET.CMD < prev   
OS/2 REXX Batch file  |  1994-02-10  |  4KB  |  78 lines
  1. ;
  2. ; ZSET.CMD by Prof. Timo Salmi, ts@uwasa.fi, Thu 10-Feb-94
  3. ; A script to set MsKermit to use Zmodem file transfers
  4. ;
  5. ; It also makes easy calling the kermit transfer scripts defined
  6. ; in getbin.cmd, gettext.cmd, getvtext.cmd, putbin.cmd, puttext.cmd,
  7. ; and putvtext.cmd
  8. ;
  9. ; First run this script using "take zset.cmd" at the MsKermit prompt
  10. ; Then you have at your disposal the new commands defined below
  11. ;
  12. ; Adapt the paths and ports as appropriate!
  13. ; To utilize this script fully you need DSZ.COM by Omen Technology Inc.
  14. ; And you must have a basic understanding of Zmodem file transfer
  15. ; I recommend that you get version dsz1019.zip for Zmodem transfers
  16. ; Alternatively use GSZ.EXE from garbo.uwasa.fi:/pc/termutil/gsz1129.zip
  17. ; or whichever version is current.
  18.  
  19. ; Auxiliary definitions
  20. define releasez define \%1,define \%2,define \%3, define \%4, define \%5
  21. define beep3 echo \7\7\7
  22.  
  23. ; Invoking Zmodem for a fixed connection
  24. ; Remember to adapt the paths and ports as appropriate for your configuration
  25.  
  26. define zdnfix run c:\telec\pcplus\dsz CON port 2 d rz r:,beep3
  27. define zupfix run c:\telec\pcplus\dsz CON port 2 d sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  28.  
  29. ; Invoking Zmodem for a modem file transfer with Forsberg's Omen products
  30. define gdn run gsz F ha on port 1 est 0 9600 pY129 rz r:,beep3
  31. define gup run gsz F ha both port 1 est 0 9600 pY129 pB4096 sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  32.  
  33. define gdn2 run gsz F ha on port 2 est 0 9600 pY129 rz r:,beep3
  34. define gup2 run gsz F ha both port 2 est 0 9600 pY129 pB4096 sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  35.  
  36. define gdn3 run gsz F ha on port 3 est 0 9600 pY129 rz r:,beep3
  37. define gup3 run gsz F ha both port 3 est 0 9600 pY129 pB4096 sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  38.  
  39. define zdn run dsz CON port 1 rz r:,beep3
  40. define zup run dsz CON port 1 sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  41.  
  42. define zget run dsz CON port 1 z pL512 pw2048 rz -r r:,beep3
  43. define zput run dsz CON port 1 z pL512 pw2048 sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  44.  
  45. define zget256 run dsz CON port 1 z pL256 pw1024 rz -r r:,beep3
  46. define zput256 run dsz CON port 1 z pL256 pw1024 sz \%1 \%2 \%3 \%4 \%5,releasez,beep3
  47.  
  48. ; Invoking Zmodem for a modem file transfer with /pc/termutil/txzm225.zip
  49. define tdn run c:\box\boxtools\txzm -b9600 -rr:\,beep3
  50. define tup run c:\box\boxtools\txzm -b9600 -s \%1 \%2 \%3 \%4 \%5,releasez,beep3
  51.  
  52. ; Invoking Zmodem for a modem file transfer with Scott Baker's szmodem
  53. define szdn run szmodem PORT 1 SPEED 9600 /SZPATH r:\ RZ r:\,beep3
  54. define szup run szmodem PORT 1 SPEED 9600 /SZPATH r:\ SZ \%1 \%2 \%3 \%4 \%5,releasez,beep3
  55.  
  56. ; Define synonyms for Kermit uploads and downloads
  57. define getbin   take getbin.cmd
  58. define gettext  take gettext.cmd
  59. define getvtext take getvtext.cmd
  60. define putbin   take putbin.cmd
  61. define puttext  take puttext.cmd
  62. define putvtext take putvtext.cmd
  63.  
  64. ; For invoking an editor, The SemWare Editor in this case
  65. ; TSE is the fully commercial rendition of QEdit
  66. ; You probably have a different editor, adapt accordingly
  67. define edit run tse \%1,define \%1
  68.  
  69. ; For invoking MsKermit autodialing from own.cll. You have to build
  70. ; own.cll (or whatever) yourself. See sample.cll for the format.
  71. define phone take own.cll
  72.  
  73. echo \13zset.cmd file transfer and other command abbreviations ready:\13
  74. echo \13  KERMIT: getbin, gettext, getvtext, putbin, puttext, putvtext\13
  75. echo \13  GSZ:    gdn, gup, gdn2, gup2, gdn3, gup3\13
  76. echo \13  DSZ:    zdnfix, zupfix, zdn, zup, zget, zput, zget256, zput256
  77. echo \13  OTHER:  tdn, tup, szdn, szup, edit, phone\13
  78.